home *** CD-ROM | disk | FTP | other *** search
- on mouseDown me
- repeat while the mouseDown
- if the locV of sprite 42 < 70 then
- set the blend of sprite 42 to 100
- redr = 255
- redg = redr
- redb = (55 + (15 - the locV of sprite 42)) * 17
- sprite(42).color = rgb(redr, redg, redb)
- else
- if the locV of sprite 42 = 70 then
- sprite(42).color = rgb(255, 255, 0)
- set the blend of sprite 42 to 100
- else
- if the locV of sprite 42 > 70 then
- set the blend of sprite 42 to (71 + (255 - the locV of sprite 42)) * 0.39200000000000002
- end if
- end if
- end if
- set the locV of sprite 42 to the mouseV
- set the locV of sprite 61 to the mouseV
- if the blend of sprite 42 < 10 then
- showit(61, 61)
- else
- hideit(61, 61)
- end if
- updateStage()
- end repeat
- end
-
- on mouseUp me
- set the locV of sprite 42 to the mouseV
- set the locV of sprite 61 to the mouseV
- end
-